 @include "readaff"
 BEGIN { Bins=10 }
 END {
     print "@relation " Relation;
     for(I=1;I<=A;I++) print "@attribute " Name[I] 
     print "@data"
     for(Row in Has[0]) {
 	example= Data[Row,1]
 	for(Col = 2; Col<=A; Col++)
 	    example = example "," normalize(Col,Data[Row,Col])
         print example
 }}
 function normalize(col,x,  key) {
     if  (Sym[col])
	 return x
     else {
	 key = 0 _ col _ "_"
	 return (x - Min[key]) / (Max[key] - Min[key])
 }}
             
     